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La tecnique du *COMPIIED-GTO' 


Les "GTO' compilés ont l'avantage de supprimer les labels en se pointant 
sur un octet bien précis. Hélas,ils ont aussi le fêcheux inconvénient 
d'être trop sensibles aux “PACKING' et aux 'GTO..'. ET lorsque l'on 
charge un programme contenant des f"GTO' compilés ( ou non ) par l'inter 
-médiaire du lecteur de cartes,ce dernier introduit Ges octets nuls. 
Un "GTO..' efface ces octets nuls, mais aussi,par la mème occasion, les 
adresses relatives codées à l'intérieur des "GTO' compilés. Heureusement 
il existe une solution simple et efficace qui permet de faire des "'GTO..! 
à volonté sans inter-agir sur les "GTO' compilés. La solution? Elle 
consiste à faire "croire" à la HP-41C que le programme est packé ( sans 
pour cela le packer ) en compilant un'E£ND' "fabriqué sur mesures", Bn 
effet,la stucture du ‘END' (cf page 3) est de la forme: C1 nm ab. Le 
nybble ‘b' indique si le programme est packé ou non. Si oui, on a: ‘9; 
si non, on a: ‘D', Rassurez-vous,vous n'aurez pas à vous livrer à un 
laborieux codage. Le programme "PP' (protects programme) fera le travail 
pour vous. L'utilisation de ce programme nécessite la présence en machine: 
du module X FONCTIONS, du programme "CODE! (je ne pense pas que :ela pose 
un problème: ce programme doiÿ être constamment en machine ),ainsi que 
l'assignation de "RCL b'. Une fois ceci en machine, faites comme suit pour 
tous vos programmes contenants des "GTO' compilés: 
1°. Charger en mahine (par l'intermédiaire du lecteur de cartes, 
evidemment) votre programme (pas ée "PACKING' ni de 'GTO..' je 
2°. FAïre MRSUB'=="=» CARD: charger le programme ‘PP' (mème remarque 
que ci-dessus). 
3°. Faire GTO "PP", puis ‘RCL b'. 
4°, Se pointer sur le dernier label avant le 'END': faire GTO "( nom 
du label)", puis RCLb! 
5°. Faire XEQ "pp" 
Et voilà,c'est fini. Remarquez que le programme "PP! s'efface automatique 
-ment,faisant ainsi un peu de ménage dans la mémoire de votre HP-41C. 
Quelques remarques sur le programme : 
- Si vous voulez privatiser votre programme, levez le flag 99 avant 
l'exécution de 'pp'. 
- Si le programme ne contient pas de label alpha dans le rrogrammre, 
il faut impérativement supprimer les lignes 19 et 29 ( "3! et ‘'}; 
le ‘RCL b' s'effectuera à la 1°T ligne, 
- les lignes contenants "E" peuvent être eventuellement remplacées par 
11,3%, 


ta 


# 





- Le programme "PP' peut être utiliser pour privatiser HN ou déprivatiser 
‘un programme en machine (contenant des ‘&To! compilés ou non), 1'utilisa 
-tion du programme "PP! dans ce cas, est la mème que précédemment, 
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81+LBL "PP" 
RCLFLAG STO 82 FIX 8 
CF 29 RDN KEQ 14 x()Y 
STO D “Hétter" -5 

AROT REL [ STO 88 RIDK 
RDN XE8 {4 - 3 - 7 
7 INT STO 81 LASTX 
FRC 7 + RND 4x 
256 AY? SF 81 RCLZ 
5 X#Ÿ? GTO 81 E 65 
FS? 81 + XTOA GTO 82 


44+LBL 81 
RDN 6 X#Ÿ? GI0 83 E 
67 F5? 41 + ATOA 
GTO 82 


J9+LBL #3 

RDN ARCL X “has” 
F5? 41 -E RCLTI 

x<> d FS?C 95 SF 44 
FS2C 86 SF 95 FS5?C 47 
SF 86 A()Y %(97? SF 87 
KT A6» d STO O “++” 
REL X CLA STD [ 


79+LBL 92 
RCL 81 15 XCDY X<=Y? 
"+8" ASTO 81 CLA 
REG 19 ARCL 41 ARCL x 
67 ATOA -E AROT 

FS2 88 “+4” FC? 84 
"+8" +9" ASTO Bi 

RCL 88 STO [ 5 AROT 
REL [ K€) d SF 83 

CF 47 F5?C 88 SF 84 
FS?C 49 SF 85 FSC 18 
SF 86 FS52C 11 SF 87 





FSC 12 SF 88 FS2C 13 

SF 89 FS2C 14 SF 19 

FS2C 15 SF 11 SF 15 

KO d CLA STDC “Has 

RL CLA STI 

“HBori" -4 AROT “He 
RCL [STD 88 pp 


ie NO use SIZE 003 
396 octets 


RCL D XxC> 88 CV 
STD © RCL 82 STOFLAG 
CLA PCLPS 


151+LBL 14 

CLA STO D “+++ 

RD OO #> d FS2C 15 

SF 13 F5?C 16 SF 14 
520 17 SF 13 FS2C 18 

SF 17 FS2C 19 SF 18 : 
F57C 28 SF 19 à) d 
Ei + INT LASTE FRC 
E3 + DEC 7 + + 
1343 - CLA RTK 


185+LBL i4 

16 / INT LASTX FRC 
16 + 9 &(>T x)? 
F5? 38 GTO 88 55 + 
GTO 89 


281+LBL 88 
43 + 


284+LBL 83 

XTOA -E AROT RIT 
x#97 GTO 18 ASTO x 
CLA END 





STRUCTURE DU ‘END! 


La structure du "END' est de la forme: CL nm ab 

Le 1°T nybble ‘C' est constant(en binaire 1100) 

Les 2,3 et éme nybbles ‘1inm' codent la distance entre le ‘end' et le label 
alpha(ou le 'END') qui le précède Gans la mémoire. 

Décomposé en binaire, 'lnm' donne: 


0007 TTTT  Trrr 
1 n m 


les 3 bits ‘o' servant à coder le nombre d'octets 
les 9 bits ‘r' servant à coder le nombre de registres 
Exemple 1: 


2 
#1 IBL "p" Ci nm F2 O0 50! 


2 
g2 ENTER 83 1 
g3 ENTER 83 L 
g4 ENTER 83 À 
g5 END c2 O1 09 Fr s 
8 octets 
0010 0000 O0GL 
2 0 l 
d'où: 1 + 1x7 = 8 octets 
Exemple 2: 
91 ENTER 83 k 
ge ENTER 83 L 
93 ENTER 83 1 
94 ENTER 83 1 
g5 END CO O1 09 "2. 
7 octets 


0000 0000 0001 
0 0 1 


d'oùs O + 1x7 = 7 octets 
Dans le 3°" octet, le 1°7 nybble indique le type de "END': 
10! si c'est un ‘end' normal 
t4t si le programme est privé 
'e! si c'est le '.END.' permanent 
Le 2° nybble indique l'état du programme (packé ou non) 
‘91 si le programme est packé 
1D! si le programme n'est pas packé 


. END, 


STRUCTURES DES TAPRE LS 


1°. Labels numériques codés sur 1 octet ( de 00 à 14 ) 
codes de 00 à OF ( EX: LBL g2 --- 0%; IBL 11 === OB ) 
2°. Labels numériques codés sur 2 octets: 
11s ent comme structure: CF nm 
où: CF est le code de la fonction 'IBL' (numériques » à 14) 
nm indique le numéro du label codé en hexa: 
ainsi LBL 99 à pour codes: CF 63 
IBL M à pour code: CF 75 
3°,Labels alphanumériques: 
Ils ont comme structures: C1 nm Fn ab xXx XX XX —- — = XX 
où: le 1°T nybble du 1°Toctet 'C' est constant(en binaire 1100) 
# ‘linm' indique la distance qu'il y a entre le label alpha et le 
‘END' (ou le label alpha) qui le précède dans la mémoire, 
‘Fn' indique le nombre de caractères alpha du label (15 maximum) 
# ‘ab' indique si le label est assigné à une touche ou non: 
si l'octet est: "O0! le label n'est pas assigné. 
si l'octet est: 'ab' le label est assigné à la touche &yant pour 
code ab ( par exemple la touche'4! à pour code: 16 ) 


‘xx xx xx = - - xx'indique les codes respectifes des caractères du 
label. 


Privatisation et déprivatisation sur HP-41C 


Tous possesseurs de HP-H1C ont essayé (et peut-être abouti) de BASANT 
un programme en machine. Si le programme contient des instructions ne 
ble",tels que les "GTO' compilés, (voir à ce sujet dans de pPcSIne AAMRe 
ros),la manoeuvre devient très complexe. Le programme proposé ici, dépri- 
vatise (ou privatise ) n'importe quel programme ,quel que soit son contenu, 
ou sa privatisation. La solution,adoptée par le programme tpp! ( ASE 
vatisation de programmes), est de compiler un tEND' “fabriqué sur mesures » 
L'utilisation du programme ‘PP! nécessite la présence en machine du module 
X FONCTIONS, de l'assignation de RCL b',et du lecteur de cartes. Enfin, 
le programme à (dé)privatiser doit être le dernier en mémoiree | 
1°, Chargez en mémoire le programme tpp'. (si le programme ne possède 
pas de 'END',faites 'RSUB',ou IGETSUB' si le programme 'PP' se 
trouve en mémoire étendue) 
2°, Faites GTo "PP", puis 'ROL b'. 
3°, Placez le pointeur programme sur le dernier label alpha _ pro— 
gramme à (dé)privatiser,( GTO “nom du label") puis "ROL b 


4°, Faites XEQ "PP" 


+") 


Et voilà,c'est fini. Remarquez que le programme tpp! s'efface automatique 


ment e 
Quelques remarques sur le programme ‘pp! | 

- Si le programme à (dé)privatiser ne contient pas de labels alphanuméri- 

! L 

ques,il faut alors lever le drapeau g1 (S #1); le 'RCL b' s effectuera 
dans ce cas à la première iigne du programme e 

= Si vous voulez privatiser le programme, jevez le drapeau 99 (SF 99), 
sinon baissez-1le (CF #9). | 

- les lignes contenant ‘Æ' peuvent être éventuellement remplacées par 


1.1'. 


Bizarreries sur HP-41C 
———S——————…—…—…—…—…—…—……—…— 


La manipulation des drapeaux internes de la HP-41C révéle bien des 
surprises. Bt c'est à la suite de ces manipulations que l'on a 
découvert que la HP-41C possède bien plus de catalogues qu'il n'en 
parrait. En effet,si on lève le drapeau 30,on a accès à des cata- 
logues peu familiers. Le programme ‘F30' permet justement de lever 


ce drapeau. 


IBL “F30" 
g2 SF 99 
#3 RCL d 


g4 STO M 
g5 FAAA 
96 x()M 
#7 X()4 





Faites XEQ "F30", puis R/S. 


à 


On meut voir alors apparaître à l'affichage, toutes sortes de mné- 
noniques. En cas générale, elles correspondent aux mnénoniques de 
fonctions assignées à des touches, lorsque l'on presse celles-ci, 
C'est ainsi que les fonctions ayant un code compris entre 10 & 3F 
produisent différentes mnénoniques lorsqu'elles sont assignées à 
une touche. Enfin, lorsqu'on modifie le mode d'affichage, on ob- 
tient différents catalogues. En fait, ceci est vrai pour tous les 
autres drapeaux. C'est ainsi qu'en mode alpha, on obtient le cata- 
logue des fonctions standards. Je n'ai hélas, pas pu trouver le 
drapeau qui me permettait d'obtenir le catalogue 1. On pourrait 
ainsi simuler la fonction "CAT' en mode programme. Encore une fois 


“ 


de plus, à vos claviers. 
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Ni 
ri] 


‘Cher President, 


Tutrouveras ci-joint le PRGM "pp" que tu 


m'as demandé de "code-barrer",. Comme je n'avais pas de 
précisions pour sa reproduction, j'ai pris 1l' 


d'ASN ‘pp" 


initiative 
à la touvhe 43 mais il est évident que si 
tu ne désires pas Lo: cette ASN, il suffit de ne 
pas lire en mode USER\'/Je joins la bande originale 
ainsi qu'une copie à l'échelle 1 et une réduction de 
format qui peut éventuellement être lue en guidant le 
lecteur au moyen d'une règle, surtout si on viñt de 
fréquenter Bacchus..... 

Comme je te l'ai proposé dans mon précé- 
dent courrier, je suis disposé à réaliser ce genre de 
transcription mais je pense que pour limiter les abus, 
il serait souhaitable de fixer quelques règles: Je vais 
donc te faire des Propositions et tu me donneras ton avis 
car hélas j'ai déja essuyé les plâtres..... 

Seuls les PRGM destinés à être publiés dans le 
Journal PPC-PC seraient codés, la bande originale serait 
expédiée à l'auteur ainsi qu'une copie à l'échelle 1 et 


une ‘'réduction!", 


Le (ou les) PRGM devront être prêts à 
être publiés c'est-à-dire qu'il devront être accompagnés 
de toutes indications utilés Pour leur utilisation, Je te 
laisse le soin de demander éventuellement d'autres préci- 
sions et je suggère que les codes des chaînes ALPHA 
soient indiqués pour leur utilisation avec le PRGM "LB" 
de Lionel ANCELET. Le débutant que je suis sait les 
difficultés rencontrées lorsqu'on ne sait pas qu'avant 
le premier code, il faut introduire le code correspondant 
à TEXT n (n étant le nombre de caractères (ou signes) 
égal ou inférieur à 15) de la chaîne et je ne parle pas 
des lisez de plus de "15 caractères" qui utilisent des 
codes qui n'apparaissent pas en lisant la chaîne, Ceux 
qui utilisent lie BG pourront facilement en déduire la 
"marche-à-suivre", Les PRGM pourront être expédiés sur 
cartes magnétiques VERifiées (et propres de toute souil- 
lure) portant les indications utiles à leur lecture 

Sans oublier d'indiquer si des ASN de LBL ALPHA globaux 
doivent être transférés en mode USER et (ou) si le 


drapeau 11 doit être armé (pardons, levé) et dans ce 





dernier cas, ne pas oublier de placer le pointeur sur 

le Pas adéquat (tous les PRGM ne débutent pas obligatoire- 
ment au Pas ÿ1 et j'avoue que c'est souvent le cas dans 
mes PRGM). 


de 


Penser aussi à exécuter une fois le PRGM avant 
l'enregistrer pour la raison que tout le monde connaît(? 
Je vois des sourires aux coins des lèvres ! 

Les K7 seront acceptées dans des conditions semblables 
(indications à mentionner sur la lettre d'accompagnement 
car je ne tiens pas à acheter un microscope pour lire les 


indications sur l'étiquette de la K7 


sas 5) 6 

Je dois indiquer que 199 REG (799 octets=bytes) 
nécessitent environ 1 rouleau de papier à impression NOIRE : 
et l'opération correspondante dure environ 2 heures, 


11 faudrait donc m'envoyer le "papier!" nécessaire en 

rouleaux complets (soyez rassurés, je renverrai la bande 
inutilisée)., Le tout devra être soigneusement emballé 
en 


du 


tenant compte que les employés des Postes ne font pas 
football aue Se les stades,.... Tout matériel détérioré 


en cours de transport risque de devenir inutilisable. 


L'emballage et l'affranchissement de retour semblent 
devoir être prévus car je pratique facilement le bénévolat 
mais pas le "mécénat", Il faut savoir que l'absence de 
drapétux (à ma connaissance) signalant BAT faible ainsi 

que le collage des bandes nécessitent ma présence constante 
lors de l'impression (un coup de téléphone a failli me 
coûter une batterie car l'impression de CB est très gour- 
mande en courant). J'oubliais d'indiquer que le codage 

est possible jusqu'à 518 REG et surtout ne ricanez pas, 

un PRGM de 318 REG est parfaitement possible et pas seule- 


ment en tiiéorie. Se rappelér cependant aue dans ce cas (7). 


‘il serait nécessaire d'envoyer 3 rouleaux (j'offre le 
papier supplémentaire....) et je demanderais que vous 
ayiez une pensée compatissante pour l'adhérent qui n'est 
«Pas encore à la retraite et qui a donc qu'un temps limité 
à consacrér à son Club. Je re pense pas que se soit les 
PRGM les +:lonzgs qui soient les + intéressants, tout du 


moins pour une assez large diffusion. 


J'ai oublié de recommander d'effacer toutes les ASN 
de fonctions avant d'enregistrer un support en mode USER 


4 
i 


car cela occupe inutilement REG par paire d'ASN.... 

Il est indispensable que chaque PRGM à coder ait au minimum 
un LBL ALPHA global (pour SAVEP) et ceux qui n'en ont pas 
prévu, peuvent en placer un en tête (Pas ÿ1). S'il y a 
plusieurs LBL ALPHA globaux, 


celui qui est choisi comme ‘titre“ Il est évident que les 


il conviendra d'indiquer 


enregistrements ne devront pas être privatisés car cela 
m'obligerait à ...... Ne souriez toujours pas, il y a 
des étourdis et ce sera peut-être l'un de vous un jour 


! 


de grande fatigue. Donc, pas de WPRV ou WRTPV 
Mon cher Président, tu jugeras de l'opportunité de 
publier l'intégraiité de cette mauvaise prose (je ne suis 
pas doué en français, comme tous les "matheux?) et tu 
voudras bien m'excuser d'avoir donné assez brutalement 
toutes ces précisions mais tu comprendras que, ayant eu 
tellement. de déboires dans ma chienne de vie, j'ai pensé 
-qu'il était indispensable de mettre les choses au point 
dès le début. Tu pourras bien entendu modifier ou compléter 
Îce "cahier des charges". 
Pour les PRGM "EDF; 'Vietc..., je suis d'accord pour 
les fournir en CB (le papier étant à mes frais puisque 
j'en suis le père) mais il faudra accepter leurs longueurs 
notamment ‘EDF &"v" qui font respectivement 259 & 257 REG. 
La rédaction de la description et de la notice d'utilisatiæ 
que je m'efforcerai de “succinter'" le nlus possible, 
demandera du temps et je pense que l'ensemble ne pourra 
être prêt que pour un prochain journal, J'ai bien une 
notice d'utilisation de ces PRGM mais elle a été rédigée 


(par un collègue) à l'attention d'utilisateurs à qui il 


. 


faut pratiquement tout indiquer comme, par exemple 


USER (s'assurer que USER est bien affiché dans la fenêtre 
o Li) 

de la machine)...... et malgré tout le soin appoté à sa 

| rédaction, il en est qui cherchent la touche OFF. Tu 


comprendras donc que cette notice est volumineuse et 


{n'est pas adaptée à des membres de PC même débutants en 
| 


) 
[ps (2). 
Je t'enverrai dans un prochain courrier le merveil- 
: 


| Leux PRGM "LB" de Lionel et je t'assurc que Ce sera très 


_sincèrement un véritable plaisir pour moi de le "code- 
barrer", Le courrier suivant comprendra le PRGM "P" que 

je stocke sur K7 sous l'étiquette "PG/CB" . Je le considère 
également comme un très bon PRGM mais je tiens à ce que 
soit précisé que je n'en suis pas ,hélas, le père mais 

à la rigueur le‘ beau-père, ne m'étant contenté que de lui 
apporter quelques modifications d'ordre mineur en fonction 
de mes goûts et manies personnels et surtout en fonction 


de mes piètres connaissances en PS. 


Tu as eu la gentillesse de m'envoyer le listing du 
PRGM "PCB8" de Patrick Zagury et je t'en remercie. Comme 
:u as pu le constater, je me suis empressé de le reproduire 
PR me semble ‘'super'' bien que mes connaissances 
ictuelles ne devrait pas me permettre d'émettre un 
jugement et 
travail dans la PILE. 


j'aimerais bien l'essayer. Pourrais-je donc avoir les 


se M 
que je puisse tout de même apprécier le 
Il est plus court que "PG/CB'" e4 
indications utiles sans oublier le SIZE et le nbre à! 
octets occupés par ce PRGM.(c'est une bonne "vérif"}). 


Il du Pas 
F4 91 69 #B B#. 





serait nécessaire de me confirmer le codes 





J'avoue que # mes ‘connaissances actuelles me destine- 


raient plutôt à faire ces "papiers" à l'attention des 


débutants en PS, rubrique qui ne semble pas avoir éête prevue 


dans le Journai. il faudrait que je fasse ces articies 


avant que Je ne sois plus débutant car il est tellement CHER ROBERT 

vrai qu'on oublie très vite le " le temps où on ne savait Je sius parfaitement d' accord 

pas encore!" ...... Si nous voulons que notre Club avec ta proposition que nous t'en- 

“prolifère", je pense qu'il faudra aider les débutants -voyons le papier pour chaque dem- 

et ne pas se cantonner dans l'élitisme.... Je suis prêt andes de code-barres 

à déveloprenle fond de ma pensée à ce sujet. OK au sujet des cartes magnétiques 
Je te prie d'accepter, mon cher Président, mes et des cassettes 

bien Fenpestumuses sels EtAns nous attendons tous le mode d'emploi 
en attendant avec impatience la publication de des programmes EDF ,V,... etc pour 

votre bouquin que je te demande de m'envoyer dès que insertion dans le journal. 

ner Mo par retour de courrier) K 2 
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J'ai réfléchi à la remarque pertinente que tu as faite au 
sujet de la réduction du format des CB. Je crois avoir trouvé 
une solution, 

Puisque nous ne pouvons pas agir au niveau de la reproduction 
nous allons essayer de modifier l'original. 

Le courant consommé par l'IMP est proportionnel à la surface 
imprimée simultanément et je ne pense pas que la batterie 
puisse supporter une impression supérieure à celle qui a été 
adoptée, Donc si nous voulons élargir les traits, nous devrons 
les rétrécir d'autant. Avec le PRGM "BAP", las traits font 
7,5 mm de large et l'épaisseur des "ÿ!! est de 1 mm. Les espaces 
font donc également 1 mm et les "1" font 2 mm. 





PHRUF 


47 FY 
di Lis 


Nous pourrions doubler la largeur et diminuer de moitié 
l'épaisseur. La consommation de courant serait identique et 
il y aurait un avantage appréciable : le nombre de rangées 
serait diminué avec une longueur de rang maintenue. La MEM 
tampon de 1'IMP permet d'imprimer 16 groupes de 8 barres par 
rangée (cf Page 9 du Manuel d'utilisation). Sur le PRGM ‘“P" 
j'ai adopté 11 octets, ce qui m'a semblé le meilleur com- 
promis. Si nous passions de 11 à 16, cela ferait un coef de : 
0,6875 environ sur le nbre de rangs imprimés. 

Pour résumer et si j'ai bien réfléchi (?), une réduction 
de format (par photocopie) Ÿ fois moins importante que celle 
adoptée actuellement devrait permettre d'obtenir des CB 
2 fois plus large et n'occupant pratiquement pas plus de 
place dans leur totalité, 


i 


Le saut de colonnes serait donc à diminuer du nbre de colonnes 
occupées par les CB "actuels", Si le PRGM n'était pas rédigé 
en PS, il me serait possible de le modifier en conséquence 
(j'agirais sur SKPCOL pour augmenter la largeur des CB et sur 
ACCOL pour l'épaisseur des traits). Malheureusement mes con- 
naissances en Ps ne me permettent pas de faire cette modif 
avec tout le sérieux nécessaire «at indispensable de sr 


Tu me diras ce que tu penses de mon idée et ce que tu peux 








_ faire dans ce sens. Ma proposition est peut-être farfelue 


car il m'arrive d'être fatigué ; La travaille comme un to 





D. À. 22 da des Pb ras de La LA fa 2haeur 
d Gxak ÿ er en eaux Lu MAR dr ui 
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Le PRGM "P" est en fait une version modifiée d'un 
PRGM "BAP" qui m'a été donné et dont je ne connais mal- 
heureusement pas l'auteur. Je tiens à féliciter bien 
vivement le créateur du PRGM qui m'a permis de réaliser 
quelques modifications suivant mes goûts et manies person- 
nels.N'étant que le "beau-père", je ne désirais pas publier 
le PRGM "P" mais c'est à la demande de notre Président que 
j'ai réalisé cette copie. 
Les modifications ont porté principalement sur : 
la possibilité de "code-barrer" un PRGM de 318 REG au 
maximum au lieu de 261 REG avec BAP (?) 
la suppression de la possibilité de coder un PRGM en 
PRIVATE (je ne ferai pas de commentaires à ce sujet) 
introduction de 2 LBL ALPHA globaux pour accèlérer le 
déroulement et, dans le même but, restructuration du 
PRGM initial. 

Les autres petites modifs sont d'ordre mineur et je 
reste à 
fournir le listing du PRGM dont l'auteur peut être assuré 
de ma très sincère admiration. 

UTILISATION du PRGM "p' 


I- Matériel nécessaire et préparation 


La 41CV est pratiquement indispensable (ou une C 
+ QUADRI ?) bien que ceux qui se limiteront à coder des 
PRGM de 62 REG au maxi ne seront pas déshérités. 

L'IMP 82162A ("IL") est bien entendu, 


associée à l'interface "IL" HP 821604 et, 


indispensable, 
ce qui est encore 
plus douloureux (pour le porte feuille), le lecteur de K7. 
Le module X FUNCTIONS est également indispensable et ne 
permet de coder que des PRGM (1 à la fois) de 124 REG au | 
maxi (127 moins 2 pour l'étiquette et moins 1 pour le END) | 
Chacun des 2 modules XM supplémentaires ajoutant à ces 
124 REG, 258 REG mais tous ceux qui savent compter (?) 
s'apercevront qu'un seul XM est suffisant. 
L'IMP doit être placée dans la boucle en position 
ceux qui sont 


1) 


adéquat, savent que si nous n'avons pas branché le câble 


# 1 et cette condition est impérative mais 


arrivés à décrypter le manuel d'utilisation (imbuvable 


! sur les périphériques levait un drapeau , 


Le "titre" (LBL ALPHA = "FILE NAME" précité) est imprimé 
en double format suivi d'une valeur (x %) indiquant le 
nombre de rangées de CB qui vont être imprimées, 

Il est vivement conseillé de surveiller le déroulement 
de l'opération car une défaillance de batterie risque 
d'une part, de vous obliger de tout recommencer et, d'autre 
part,de détériorer la batterie essoufflée. Si un "LOW BAT" 


il aurait été 


possible de parer à cette éventualité. 


1 
| 





solution pour une raison que vous m'excuserez de ne pas 


développer ici. 
Un rouleau (complet) de papier à impression noire 


ref. 82175A et, ce qui est beaucoup plus important : 


9 


les batteries des périphériques préalablement chargées 
copieusement car particulièrement l'IMP est très gourmande 
(en mAh) lors de cette opération. Vous êtes prêts pour 

la mise à feu... 


II- 


Utilisation du PRGM "P" 


Nettover complètement la XM au moyen de PURFL si vous 
n'avez qu'un seul fichier ou si vous êtes patients; 
utiliser le PRGM "CLXHM" 


Placer en XM le PRGM à coder après l'avoir 'PACKé'" au 


dans le cas contraire, ci-joint. 


moins 2 fois (GTO ..=conseil) pour supprimer les nuls 


inutiles. (SAVEP), Précisons que seul le PRGM à coder 
doit se trouver en XM et que, de ce fait, il doit com- 
porter obligatoirement un LBL ALPHA global au minimum 
(pour SAVEP), Le LBL choisi servira de "titre" au PRG“. 
Placer en MEM principale le PRGM "P" et le PACKer 

(GTO .. facultatif mais conseillé) 

L'iP sur mode NORM, lecteur de K7 sur ON (1'I“P aussi 2) 


XEQ "P# et c'est parti ! 


La fin d'un rouleau de papier est ‘prévue! par le PRGM. 
"PAP! est affiché et imprimé (précédé d'un BEEP) et permet 
donc de placer un nouveau rouleau mais il est possible 
d'interrompre l'impression au moyen de R/S, (qui ne sont 
pas mes initiales...) mais unigement après l'impression 
complète d'une rangée. C'est particulièrement utile si 


vous voulez éviter d'avoir le rouge" de fin de bande, 


la disposition des personnes intéressées pour leur | Le "R/S" doit être utilisé dans les mêmes conditions à la 


suite d'une indication de batterie faible (l'anglais serai 
"plus court" pour cette dernière expression !}). 

Ce ‘'code-barrage!" est très gourmand en papier. IL faut 
compter environ un rouleau pour 1#9 REG de PRGM (7#9# octet 
BYTES) et le temps d'exécution est de l'ordre de 2 heure 


pour un rouleau. Rassurez-vous, vous pouvez au fur et à 


mesure de l'impression, récupérer les rd%s et les coller 
soigneusement sur une feuille de papier afin d'éventuel- 
lement les photocopier et, toujours éventuellemnt, réduire 
le format avec une reproductrice appropriée à haute 
définition (je ne veux pas faire de publicité). A ce sujet 
je vous conseille de vous adresser à un professionnel 
compétent car la qualité du résultat obtenu ne dépend pas 
uniquement de la "finesse!" de la machine utilisée..... 

Je vous remercie de votre attention et je vous demande 
de m'excuser de ne pas avoir réussi à être plus concis 
et de plus, j'ai un français désastreux. Je précise que 
malgré (et peut-être "à cause"(?)) cela, je répond à toute 
les lettres qui me sont adressées, Mais au fait : 


“& Est-ce qu'il y en a qui font autrement 7? >> 


A MN HOUR 


Ceux qui désirent modifier la longueur des rangées 


Bons codes-barres ! 








PS. 
peuvent remplacer le huit du Pas 19 par une valeur supé- 
rieure qui sert également à un SIZE de ‘"sécurité" mais 
la valeur adoptée me semble le meilleur compromis.... 


Ceux qui connaisseatle PRGM "BAP + BAPV'!' sont 


priés de m'indiquer éventuellement son Auteur. Merci ! 


Mon cher Robert 


Un grand merci pour ce travail (qu'on peut 
qualifier de titan) je pense que d'autres 
peuvent maintenant reprendre le travail 
pour les barres que nous voulons. 


Les programmes P et CLXM sont donnés 
en code-barres. 


BONNE PROGRAMMATION R/S 
PHILIPPE GUEZ 
LE PROGREURE RAP VENT  O' ON 
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Frank lobastard 9672 T3S 
Contad rex ona| brefagne PPC-T 
16, rve du la jalouxe 
35608 Redon 


À 
Philippe Cue 
56, rue J) fouskav 
45001 Paris Redon, 15 mars 1989 


Cher monneur Grues. 
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À sex 


Tous les membres du PPCPC 
sont invites à cette reunion 
avant d'y aller prévenir 
Jacques Vaucelle (PPCPC n°21) 
au 16(99)98 83 69. 

Si un parisien a l'intention 
de faire le voyage en voiture, 
qu'il contacte Francis Rosange 
au (1)700 54 24. 

Merci 


Philippe 


Cher ami 

Merci de tout coeur pour tes 
encouragements.Effectivement, 
il ne faut jamais desesperer 
car tout vient à qui sait 
attendre . Je suis d'accord 
pour les articles manuscrit 
à condition qu'ils soient bien 
présentés et lisibles. 

Le premier numéro est celui 
d'avril,mais vous aurez votre 
compte avec 10 numéros par an 

Aucun souci à te faire au 
sujet du journal de Toulouse, 
il reprend les mêmes conditions 
de copie que le PPC américain. 


BONNE PROGRAMMATION 


Philippe 





LE PETIT THEATRE DES MICROCODES 


A tous ceux qui désirent faire du microcode, voici toute une 
serie d'articles qui vous y aideront tout d' abord une brêve 
entrée dans le CPU 


NOM DU NBRE DE DESCRIPTION 

REGISTRE BITS 
A 56 REGITRE PRINCIPAL ARITHMETIQUE 
B 56 REGISTRE PRINCIPAL ARITHMETIQUE 
C 56 REGISTRE PRINCIPAL ARITHMETIQUE 


(DONNEES DU BUS) 


M 56 REGISTRE AUXILLIATRE DE STOCKAGE 
(STO,RCL uniquement) 
N 56 REGISTRE AUXILLIAIRE DE STOCKAGE 


(STO,RCL uniquement) 


G 8 REGISTRE AUXILLIATRE DE STOCKAGE 
(STO,RCL uniquement) 

P 4 POINTEUR(DANS A,B ET C) 

Q 4 POINTEUR(NOTE) 

PC 16 COMPTEUR PROGRAMME (ADRESSES MICROC.) 

ST 8 REGISTRE D'ETAT (DRAPEAUX O A 7) 

T 8 REGISTRE TONE (UTILISE POUR 
ACTIVER LE BENDER) 

KEY 8 REGISTRE CLAVIER(GHARGE QUAND 


UNE TOUCHE EST PRESSEE) 


NOTE: Les pointeurs peuvent être armés ou testés,mais 
seulement un seul est actif.Le pointeur sélectio- 
-nne est appele R 


LES DRAPEAUX: Il y a un système de 14 drapeaux internes.Chacun 
d'eux peuvent être individuellement armés,désarmés ou 
testés.Les drapeaux O0 à 7 peuvent être chargés,lus ou 
échangés avec l'exposant de C. ce groupe de drapeaux 
peut être considéré comme un registre ST (pour STATUS) 
le registre ST peut aussi interagir avec le registre T 
utilise uniquement pour activer le bender. 


DRAPEAUX UTILISATION 
0 à 7 registre ST 
8 & 9 usage general 
10 pointeur programme en ROM 
LT montee de la pile 
12 programme privé 
13 le programme tourne 


En ce qui concerne la codage des instructions,le mot binaire 
sur 10 bits peut être lus de plusieurs façons en hexa : 
soit en 244 (2 bits 4bits 4bits) systeme americain 
soit en 442 (4 bits 4bits 2bits) systeme australien 


mais on peut passer tres facilement d'un codage à l'autre par le 
mot binaire complet. 


2 © € en 244 
ex: 1000000001 
& «© À en 442 


l 





Mais nous en arêterons là pour aujourd'hui à toutes fins utiles 
pour ceux qui désirent en savoir plus il existe un livre trés 
interessant écrit par monsieur J.D.Dodin intitulé "AU FOND DE 

LA HP41" et qui explique plus à fond les registres internes et 
leur utilisation et donne toutes les mnémoniquesPPC du microcode 
de ia HP41 ainsi que certains programmes. 





BONNE PROGRAMMATION R/S 
PHILIPPE GUEZ 
PREFIXE & SUFFIXE d'un code XROM 


Pour obtenir les valeurs DEC correspondant à une XROM, 


prenons l'exemple de notre cher BG : 











XROM 28 63 

10100111100|111111 | (BIN) 

5 6 | bits 

Partageons les 16 bits en tranches de 4 : 
1010|0111|0011|1111 

A |7 3 | F |(HEX) 

et nous obtenons A7 | 3F 

ou en DEC 167 a | qui sont les codes 











à utiliser avec le PRGM "KA", si vous avez réussi à le 
faire "tourner"..... 
Bonnes programmations ReSe 
P.S.: Le mode de décodage indiqué ci-dessus pourrait 
être baptisé : 556/kkk4 (bits) étant entendu que : 
5+5+6=4+k4+4444 


Les codes 167,63 permettent bien d'obtenir L'ASN 
XROM 28,63 avec le PRGM "KA" mais, 6 surprise ! la fonction 
"BG" est inopérante. En mode PRGM, "XROM 28,63" est intro- 
duit comme une fonction. Il semblerait donc que notre cher 
BG (celui des "sportifs") ne puisse être ASN qu'en allant 
dans la "table" d'ASN, derrière le rideau. 

Je lance donc un S0S à "ceux qui savent" : peut-on ASN 
le BG avec "KA" et, dans l'affirmative, quels sont les 
codes à introduire ? (?). Robert SCHWARTZ 


141, avenue Carnot 
93140 BONDY 





LES PREMIERS PAS DE BEBE 


Plusieurs membres ayant émis le désir d'un article sur la 
programmation synthétique ,voici donc sous cette rubrique un 
sujet qui interressera un grand nombre de débutants sur HP41. 


Une des premières fonction synthétique connue fut le CRIC, 
appelée BJ(BYTE JUMPER)aux USA. 


Pour le générer,2 méthodes: 


1- -effacer toutes les assignations existantes 

-assigner DEL à la touche T- et BEEP à la touche — + 

-se placer en mode PRGM et par un CAT 1 , R/S se placer en 
début de la mémoire programme éxecuter un GTO.#99 puis 

placer un LBL quelconque (LBL*??) 

—éxécuter en mode PRGM un CAT 1 puis appuyer immediatement 
sur R/S pour se placer sur LBL*? toujours en mode PRGM se 
mettre en mode ALPHA appuyer sur la touche d'effacement(æ) 
vous devez lire : 4ÿŸ94 RCL 91 sortir de ALPHA allez au pas 
991, le listing est 


CE 


la fonction BEEP est assi- 
-gnée àla touche ayant le 
code LBL #9 
la fonction DEL de codeLBL #1 
est assignée à la touche 
ayant pour code LBL 98 
-allez au pas 992 (GTO.1/x) effacer les deux lignes 992,903 

( — 1/x) 


-entrez une lettre quelconque , le listing devient: 





maintenant la lettre 'W'" 
est assignée à la touche €+ 





-passez en mode calcul et faites un GTO.. 
-une pression sur + vous devez lire YS5,NN (NN est la place 
de la lettre assignée dans l'alphabet). 


C'EST VOTRE CRIC!!!! 
Les fonctions synthétiques de deuxième génération sont:le 
BYTE GRABER ,le PREFIX MASKER ... qui sont des assignations de 
lignes de texte. 


Pour les générer: 

2- -retournez dans la table d'assignation par la même méthode 
que précédemment aprés avoir assigné BEEP àla touche LN 
et DEL à la touche LOG 

-mettez vous en mode USER puis PRGM 
-faire CAT 1 puis immédiatement R/S 
voir methode précedante et le bulletin de 
liaison 
au lieu d'effacer 2 lignes,il faut effacer 3 lignes(DEL VX) 
-entrer la chaine en mode ALPHA * AAAAAAA 
ATTENTION ! selon les modeles de calculateurs vous pouvez 
obtenir une ligne totalement differente.Tant qu'il n'y a 
pas de MEMORY LOST tout va trés bien. 
-faites un GTO.. et c'est terminé 





-une pression de la touche LN donne l'affichage de XROM 29,91 
(ACA si l'imprimante est branchée).On peut aussi assigner 
XROM 29,99 nous l'appelerons donc -PRINTER-. 

ces fonctions synthétiques peuvent être utilisée soit comme 

le BJ en mode CALCUL soit pour générer les fonctions synthétiques 
et les chaines de caractères en restant en mode PRGM 


entrer en mode PRGM et mettre les lignes 
ABC&RCL IND 16 
ABC3RDN 
Allez au pas ABC4appuyer sur le -PRINTER-,effacez 
la chaïine visible et appuyez sur SST vous devez 
lire: RCL M 


une chaïine de 4 octets nuls: 

ABC 1 

ABC RCL IND 16 

ABC ‘"'ABCD'' 
Allez au pas ABC,passez en mode CALCUL appuyez 
sur le -PRINTER- et repassez en mode PRGM vous 
devez lire:ABC RCL IND L 
appuyez sur SST puis executez DEL 994 effacez le 
RCL IND 16 et le 1 en appuyant 2 fois sur la touche 
correction ( ) 
une pression de SST vous donne la chaine désirée. 


*uppc P C": 
une chaine de 9 caractères 

ABC: 1 

ABC? RCL IND 16 

ABC3!"ABCDEFGHI" 
Allez au pas ABG passez en mode CALCUL appuyez 
sur le -PRINTER— et repassez en mode PRGM vous 
devez lire ABC;RCL IND Q 
Appuyez sur SST ensuite DEL #99 repassez en mode 
CALCUL appuyez à nouveau le -PRINTER-puis entrez 

ABC; RCL 92 

ABC, LN 

ABCs LN 

ABC4/ 

ABC3RCL 99 

ABCs LN 

ABCeRCL 69 

ABCee/ 

ABC,RCL #2 ensuite faites un BST appuyez 2 
fois sur la touche d'effacement (€) un SST vous 
montrera votre chaine 





APPEND ,6 octets nuls: 
ABC, 1 
ABCZRCL IND 16 
ABCs'' ABCDEF 
Allez au pas ABCien mode CALCUL appuyez sur -PRINTER- 
repassez en modePRGM puis SST 2 fois et DEL #96 
effacez les 2 lignes précedantes et SST 








numéros verront 


ren a 


Maintenant vous avez les moyens d'entrer un grand nombres 
de lignes synthétiques dans vos programmes. 


Nous allons en rester là pour aujourd'hui,mais les prochains 


le jour à: 


-le Q LOADER (appelé Je en france par l'OI) 
-le TEXT ENABLER 

-le ehanced BYTE JUMPER 

-la fonction?W 

—un aperçu des registres internes (qui sont détaillés 
dans un livre ,les secrets de la HP41 qui devrait 
bientôt sortir) 

—quelques programmes utilitaires 

—la table hexadecimale des fonctions 

-la structure de la table d'assignation 

—la structure des END, LBL , GTO , XEQ . 

—les fonctions synthétiques en code-barres. 


à tous,une bonne programmation 
PHILIPPE GUEZ(1) 
ne R/S 
Se0.S >. 


Qui pourra nous donner des indications sur les 


me — ts Les A 


drapeaux 36 à 39 qui indiqueraient le nombre de 
digits? Un digit est un # octet donc 4 bits mais 
toutes mes recherches ne m'ont pas permis de découvrir 
à quoi correspondent ces Æ ärapeaux qui permettent 

de compter jusqu'à 15, c'est-à-dire de stocker 16 
Minformations'"(de #ÿ à 15;::;:). 

Le drapeau 46 correspond-il à l'affichaze du 
tiret inférieur nous indiquant qu'il faut introduire 
une valeur ? Dans l'affirmative, comment notre Diva 
s'y prend-elle pour déterminer s'il faut afficher 
1, 2 ou 3 tirets 7? 

Dans le cas d'utilisation de l'IMP non "IL'' ou 
dans le cas de non utilisation d'IMP, peut-on se 
servir des Drapeaux 15 & 16 ? Peut-on également se 
servir des drapeaux 18, 19 & 34, 35 ; ces deux 
derniers étant éventuellement armés au moyen de la 
PS ? 

L'utilisation des drapeaux 22 & 23 nécessiterait, 
je pense, qa précisions de la part de "ceux qui 
savent". Je les prie de ne pas me laisser mourir 
idiot car ce n'est pas dans les notices d'utilisation 
de belle-mère HP qu'on peut espérer trouver une 
réponse à ces questions, même dans celle de 1l' 


“utilisateur expérimenté" (sic)..... 





Merci de votre attention, Re 


CHOC EN RETOUR 


MPREMIER PAS"..... 


Voici une méthode permettant d'obtenir le même 


résultat que celui obtenu avec les indications données 
par Lionel ANCELET, PAGE4 VOL. NO. de JPC. 


OFF <— (maintenu) ON 
relacher <— 

SHIFT ASN 

ALPHA ABS 


ALPHA 
LN 


SHIFT ASN ALPHA DEL ALPHA 
LOG 


USER PRGM 

SHIFT LBL 

ALPHA 

L 

ALPHA 

SHIFT CATALOG 

1 et immédiatement R/S 
LOG 

+ 


SHIFT BST 


SHIFT GTO 


LN 


LOG Vx 


ALPHA AAAAAAA ALPHA 


PRGM 
SHIFT GTO ee 


MEMORY LOST 
ASN 


ASN ABS_ 
ASN ABS _ 

(ASN ABS 15) 

.9999 

ASN DEL _ 

(ASN DEL 14) 

5.9999 

#9 REG 45 

#1 LBL 

#1 LBL 

#1 LBL L 

#1 LBL "L 

CAT _ 

EBL "L 

DEL ___ 

(DEL #91) 

( LD94) 
«END. REG 44 

( 4993) 
k993 DEC 

4994 GTO __ 

GTO .___ 

(GTO #95) 

#5 LBL #35 

(DEL #93) 

#4 STO #1 

#5 "AAAAAAA 

ou autre affichage 
D. 5999 
(PACKING) 


p.5909 





(XROM 29,#1) 
5.#999 


LN (maintenu) 
OUF ! , c'est terminé ! (?) 
Avant d'enregistrer cette ASN aur une carte 
avec WSTS, je vous conseille d'ASN PACK à la 
touche À + et de placer en ALPHA MERCI ROBERT 
(quand je vous disais que je me regardais le 
nombril....) 
Les affichages indiqués entre parenthèses 
signifient une apparition fugitive. 


+ reduce nana fe meules . { Naughe Jo ao fu ur 
Écos 


es ) À As \aute L& à KexoŸe sa Re mx aux 


us ut ca) qu nude . ke meubes all ut t 
dou ae ur PRE Rpnis . UAPTER Moule 


Choume 0 ., 
HKiauhe ou Pa 890 
te 


\ 


CIE 


36, Rue J. % . 
PSRBL SG? {6-FE "joe 


Unfuvtunitel, he PPe dscsot bu lun di continid, hadssas 
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INTER PALES, Puto CODENS, NÉRam-IB, Ne disent Pots EPram Am, 
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suite à un courrier envoyé à N Croyle,il est possible d'avoir des réductions 
sur le protosystem/coder selon la quantite commandée me contacter. 
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il 
A, 4 
hi 


k 


69 "A 


ri 


Pseudo-chaînes de plus de 15 CARactères 


La chaîne suivante IMPrimée en mode MAN avec l'IMP 
non "IL" a de quoi surprendre le débutant que je suis et, 
dans le but d'aider mes condisciples, je vais essayer de 
développer la question tout en restant le plus concis 
possible (çà ne va pas être facile !). 


En fait, cette chaîne place en ALPHA 7 CAR. dont les 
codes sont faciles à obtenir avec 7 ATOX : 

11,224,1,195,11,224,176, (en DEC, bien entendu) 

#B,E#,#1,69, #B,E#, B# (en HEX) 

Les "cracks" de la PS reconnaftront tout de suite les 
3 codes HEX caractéristiques d'une chaîne destinée à être 
introduite dans le REG c . Les g°me; BÊMedigits 1,6 & 9 
sont eneffet les codes qu'il faut obligatoirement rentrer 
si nous ne voulons pas avoir un ML dès le 1°T contrôle". 

Mais alors, me direz-vous, pourquoi 1'IMP nous use tant 
de papier ? 

Les codes déchiffrés par ATOX sont bien ceux qu'il faut 
introduire dans le REG c pour le placer dans la configu- 
ration désirée mais Dame IMPrimante ne considère pas tous 
ces codes comme ceux de l'ASCII. Le code 224 justifie les 
caractères précédents à gauche de la ligne et le code 176 
saute 16 CAR. Notez que je ne suis pas sür de ce que j'a 
vance car c'est la lecture du tableau de la Page 14 du 
manuel de Ll'IMP "IL" qui m'a poussé à faire ces déductions. 
I1 se trouvera bien une personne avisée et dévouée pour 
confirmer ou infirmer cette hypothèse car, je dois le 
préciser à nouveau, je ne suis, sans excès de modestie, 
qu'un débutants; débutant et chercheur obstiné, il est vrai. 

Si vous voulez créer cette chaîne, n'oubliez pas d'in- 
troduire le code 247 (TEXT 7) avant les codes DEC indiqués 
(PRGM "LB" de Lionel). 

Qu'allez-vous faire de cette chaîne, me direz-vous ? 

Nous l'utiliserons pour transformer un PRGM placé en 
XMEM, en données numériques et pour vous mettre l'eau à 
la bouche, la suite me (ou nous) servira à démontrer Le 
Mfonctionnement" du PRGM "P" qui permet d'imprimer en CB 
tout PRGM préalablement placé justement en XMEM. 





Je précise que si je reporte la suite de cette démons- 
tration, ce n'est pas par vice ou pour tout autre raison 
aussi mesquine mais tout simplement parceque je ne suis pas 
tout à fait en mesure de le faire pour l'instant. Je me 
suis fait aider par un charmant et éclairé correspondant 
et j'attends son autorisation pour utiliser les indications 
précises qu'il a eu la gentillesse de m'envoyer. IL est 
bien entendu, comme je lui ai précisé et avec son autori- 
sation} ‘je citerais mes sources, Les personnes dévouées 
méritent toute notre reconnaissance, 

En attendant, il se trouvera peut-être quelques adhérents 
compétents et dévoués pour nous indiquer le système de 
codage des 3 premiers et 3 derniers digits du REG c . 

Je serais heureux que les débutants, mes frères, 
m'écrivent pour me donmer leur avis et éventuellement leurs 
critiques (pas sur le français, je suis incurable !) sur 
mes élucubrations (au sens propre!). Je ne voudrais pas 
encombrer les pages de ce Journal si ma mauvaise prose 


n'intéresse personne..... 


Donc, peut-être à bientôt, ReSe 
iocteur franklin khazine docteur frankiin khazine Le 14 Février 1983 
1ephrologue nephrologue 


37, avenue aibert-1" 
32500 rusil-maimaison 
él. 2749-21-00 


Monsieur Philippe GUEZ 
97, avenue albert-1" 56, rue Jean-Jacques-Rousseau 
92500 rueil-maimaison 


| 

| 

Î 

| 75001 PARIS 
| tél. 7498-21-00 

| 

| 


En utilisant le programme "KA" publié dans le livre 


de WICKS, en utilisant systématiquement le préfixe 4 et à 
partir de 184 jusqu'à 217 on obtient des assignations dont 
l'utilité m'est pour l'instant restée inconnue, plus exactement 
incompréhensible : 

Par exemple 4, 186 correspond à ef f# @ BP 


4, 187 correspond à O< 9 etc, etc... 


Qui peut m'aider ? 


Cher Ami, 


Je vous adresse un chèque d'adhésion au PPC de Paris 
et je vous joins séparément une petite déocuverte réalisée 
que je n'arrive pas à m'expliquer. 


| Si quelqu'un peut éventuellement m'aider, je serais 
fort intéressé dans la compréhension et l'utilité d'un tel 
type de programmation. 


En vous remerciant, 


y je vous prie de croire, Ch É 
à l'expression de mes meille : re 


urs sentiments. 


P.S. : il est évident que l'affichage NON EXISTENT est provoqué 417 
quand on en demande l'éxécution. 


P.J. : un chèque d'adhésion 
un mot explicatif msg À …. 





Le premier programme imprime l'alphabet grec, si on possède l'imprimante. 
J'ai fait le programme sur l'imprimante 82162-A, si bien que quelques 
modifications peuvent être nécessaires. 

La traduction en français est aussi donnée. 





Le second programme est spécialement utile si vous possédez le module 

TIME. En effet , vous savez que si pour une raison quelconque vous enlevez 

la batterie de la HP, l'horloge se dérègie. 

Avec ce programme, donc, il sera très aisé de tout remettre en état. 

Nécessite aussi l'emploi de l'imprimante, mais est facilement modifiable 

pour ceux qui ne la possèdent pas. 

Mode d'emploi: À la demande : "DATE?DD,MMYYYY" ,il faut introduire la 
date (jour,mois année) 

À la demande :  "TIME?HH,MMSS" ,il faut introduire l'heure; 

(heure,minutes secondes) 


Puis il y a impression des statuts de l'horloge. 
NOTA: La ligne 11 peut être remplacée comme on le désire (facteur de correct 


on de l'horloge). 
ee ae 
La troisième routine mesure le temps d'exécution des fonctions de la HP. 
Le module TIME est nécessaire. 
La fonction à chronométrer est à insérer à la ligne 07. 
Si on utilise fréquemment le chronomètre de la HP (avec le module TIME), 
il est préférable d'ajouter juste ‘après la ligne O1, la fonctionSTOPSW ou 
alors d'inverser les fonctions SETSW et RUNSW. 
À la demande : "“PARAMETRE ?" , il faut introduire la valeur pour laquelle 
on désire chronométrer la fonction. 
En effet il faut savoir si on veut chronométrer le SIN de 60 
ou le SIN de 88,4 . 
Le temps net est ensuite affiché. 


REMARQUE: Les lignes synthétiques , surtout dans le premier programme, 
peuvent facilement être introduites à l'aide du programme "LB" 
du PPC-ROM , ou alors avec des procédés tels que : Byte Jumper, 


Byte Grabber,etc... 


2 en MH. BENEPE TTi 
8 Ris 6 
Si JATE 41 CLGCE 
53 ADATE 48 STOP 
B3 “hs dei °Aü08" 


44 DÜk 
43 KES IHE K 


d£ RTE 





ed Tu AT 


LT ds 
de. à 






ET TS Ta Ta 


É 
Ê 
3 
= 
3, 
Ê 
; 
À 
£Li 
Le: 
3 
É 
ai 
es 
a 
mn: 
s 
3 
= 
À 
» 
7 
+ 
= 
7 
4 
7 








é 


cts de nee At gen te ut 


du 


D 








ER EN 
AU end 


“ut mn EU 
AN CID et 
ie LU 
LE 





A, ET des me eg at En md Lu ven CE 


Lu A Œ 

4H 
— Le 
Ft â 
+ x 
> ë 
#, 

4 À 
+ ç 


ui 
mat 
S 


a à 


Lu 
Ms té 


Ë 
É: 





EAN CAEN CAEN deu 


ct 
1 


4 
EN 4 





dt ce CR 
64 


CC 
Cod Pace tte Et 


pt 
fre 


eut te CM 


MA Et 


CCR CS COR CRC 
D =] 


ne pa 


“1 
La 


rs fa 
cf 


dt 
A 


bo 
c 


rs 
cr 


à 
ed 


ul Fan Pa 
Mes An 1 


“ht 


Si 


éad ot Cut ad Led 
md 


du fe 
0 


Œu fe fn fre 
Eee AT ie Ge Fe ent Ce 


fu 


d 


È 













BOT LOLDSe 


HHOLI WELL 





FHFRÉSEERETÉÉEES 
ACA 
FSARFEFÉFÉE" 


KE 8 ppt 
“pr 

REG “FRI" 
“gi 


KEG “PRI* 


3 “aYr0" 
6 XED “PRI" 





4 
È 
! 
Î 
Î 
Î 


85 * 


£ 
E 


mn 


£ YVES 2fDTs 
+ ALES FAI 
TE =-$2 

+ ds 

& = 

7 


Et CT 









Ju 
a 


ét 
at 


s) 
Le RS 





88 SEFCHR 
SX RER 

&à RES PEC 
De 


4 


Ë 


5 


ë 
8 


. 
f 
3 
3 


r' 


it 





L 86 
T 


À 
Ÿ 
i 


MG a 





4 
“ts 
ps 
æ 
es 





MAS RNA CN CN 


Ve ponts dt 


Eat 
ds 
ur: 

a 


ME A 
at 
EURE 


at 
ne 
“ 


MA CE At 
Cut 6 LT in 
be] 

Fur] 

Er ] 





ER At LAN à, 
“2 


Rs CE dis CA 
fn, ed Fu mn MAO 











148 ETH 
I4SLEL 17 
158 °TAU" 

151 ATH 
ISRAEL 18 

153 “TAU €.) 
154 ETE 
ISSLEL 19 

156 "HELTR* 
157 ÊTH 
I5SLBL 26 

153 *PI M. 


Ets Ci 
MA 0 
md US 
me 


el 


FLBL 23 

68 “IELTA €H.;° 
59 RTE 

PALBL 24 
*IZETA* 

8 RTÉ 


El 3e 


LE ès 


“LARBDR £K, 3° 


Fe 


re 
RCI 


md dm cg mu end el el fe da de de Cfa 
M et Ps CUT fu al Va + 3 


OS 
St 
qe 


qe ponte une uude frarte fume jade gute hu Bale porte foule pote fade ponte fre faute faute poule pate 








LIGNE 45 
LIGNE 17 
LIGVE 19 
LIGUE 21 
LGVE 23 
LIGNE ST 
LIGNE 27 
LIGNE 29 
UGNE 34 
LIGNE 33 
LIGLE 35 
LIGVE 37 
LIGNE 39 
LIGNE 41 
LGNE 43 
LIGUE #5 
LIGNE GZ 
LIGNE 439 
LIGNE 54 
LIGNE 53 
LUGVE SF 
LIGWE 57 
LIGNE 59 
LIGNE 61 
LIGNE 63 
LIGNE 65 
LIGNE 6} 
LIGNE 69 
LIGNE Ÿ1 
LIGNE 73 
LIGNE 75 


F7 
F7 
F7 
F7 
F? 
Fi 
F1 
F7 
77 


F7 
F 


F7 
F7 
F7 
F} 


F4 
F} 
F7 


F7 
F? 


F7 
F7 
F} 


F} 
F} 
F} 
F? 


CODES HEX4 POUR LE PROGRAMME 


189 GC deg 


11 
10 
18 
19 
19 
19 


18 
41 


14 
11 


L 
11 
10 
14 
16 


10 
19 


19 
10 


19 
10 


11 
1 
411 
16 
10 
19 
19 
19 
19 


g?+ Fc 
CARE 
d4 + 
03 Fo 
1 415 
O1 F4 


2S Of 
DD g9 


G1 1 
Fe PT 


4 1% 
87 D 
18 17 
FA 51 


412 S4 


18 de 
GC 08 


O1 8% 

GT FC 

EZ 24 
OS 
gZ cu 
G1 dy 
23 GS 
DS Go 
GY F2 
389 85 
agé 38 
29 ÀS 


E2 24 


27 &f 


19 
69 
19 
14 
29 
99 

ÊF 
61 

17 

a2 


C4 
29 


EG 
42 


99 
F8 
4F 
29 
18 
48 
LE: 
68 
BA 
Es 
61 
og 
17 
CF 
SF 
D 


29 
30 
32e 
A3 


ST 
2F 


30 
gD 
F9 
g2 


où 
37 
ge 
23 
2e 
39 
Ed 
SF 
18 
gr 
18 
34 
DS 
co 
34 
1% 
Ty 
CZ 
F5 


19 


ESS 
4 
64 
A9 
ge 
SA 
85 
TD 
21 
20 
CE 


vÉ 
62 
At 
£@ 


41 


ua 
44 


4g 
?F 
ea 
1% 
FFC 
84 
EE 
S3 
SF 
48 
#5 
ÿA 
ce 


3 
SD 
DA 
go 
dE 


1€ 
2 
do 
61 
dé 
39 


PA 
ES 
2 
26 


22 


g1 
83 


82 
C1 
62 
7F 
ég 
D 
62 
2e 
Go 
TC 
2 
CES 
38 


"GREC ” 





XEQ “CN 


ST0 


PACKING 


610 … 


PACKIHG 


SAVEP 


KEQ °P° 


456 


1 


18 93 8 7 6 5 4 3 


11 


N 


22 21 26 19 18 17 16 15 14 13 1 


23 


Te nnEnnnnnnEntannntnnntEnnrEEnttEnnl 
Tr nannnnnnnrranntnnnnntrnnnarnntrsl 
nn nnnnnnnnnnnrnnnnntnnnntnsanntnttnl 
Tr nnnnnnnnnnnnnnrnrnnnttnnantEEtnEl 
Tr nnnnnnnnnnnnnnnnrartnnanrnnrrttEttEnlnl 
nn EnnnnEntErnnnnqnnEnlREnEnEnettl 
Tr annnnnnrnnttnaennnnnnentutntntEtttn 
Tr nnnnnntrntnnnnnnnnnnnllttttnEn 
Tr nEnnnnennrnrnnntnnnnnntntlEtEnUnR] 
a nnnnnnrnnnnnnnnnnnnnltRAntInTEnntEl 
en nnnnnnnnrrnnnnnannnrntttnnttttntrtUUnE 
nn nnnnnnnntEnnnnnnnnnnannntInreltnl 
re nnnnannnnnnnnnnnsennnnnntnnllttIenEl 
nn nnnnnnnnntnnntnnnnRennlnn 
ar nnnnnnnnnrnnnnnnnnenntnntAETAAEAEIEn 
ren nnnnnrtannnnnnnnnnErnnttntttenUnl 
a nnnnrnnnnnnrnnttEnlEnn 
nnnnnnresnrnnntnnannrnttntttEttETEnl 
nnnnnrnnntnntEEnrEnlttttEtE 
ner nnnnnnnnnnnnnnnntEnntnInnl 
artnet nnnnnnnnAnENNEEt EAN 
nn nnnnnnnnnnnrannnnannttUUnnnnntntnzl 
nn nnnnnnnnnnnanltntnnnrE 





24 
43 42 41 48 39 38 37 36 35 34 33 32 31 36 29 28 27 26 25 


44 


n 


4 


nt nennnnnnnnnrnntEnnntElEnItEnEEn 
Er nnnnnnnnnnrnnnnnnnnEnnnttEnnl 
TnnnnnrnnnnnnnnnntnnnnnnnntAAnlttIEn 
nr nnnnnnnnnnrrnnrnnlntnEnInAlIt 
een EnEnnaannnnnnnnnnnnnnnnrnnntttttnnl 
nnannnnnnnnnnnnrntanannnttttttnnnttn 
Tr nnrannnrnnnnnnnnnnnnntntnnEuttunnl 
rar rar nnnnnnEnnnnnnntntnnnennnnnEnnnannnn 
nn nnennnnnlntnrennnnntnnnennnntnrtnun 
Enr rnnnnnaannntnnnnnnannlUtEnnntUtntEE 
nr aaaElElllUEEnlnEntnnnn 


8ieLBL “CLAN" 
82 “ri+8 
83 Ko L 
84 4 c 
95 A6 
86 STO 63 
g7 AC 
88 AO € 
89 x) [ 
18 CLA 

{1 EXD 


CLXM 
SEEKPTA 
GETR 
CLA 
ARCL 98 
u+CLx 

F5, 44,u3,4C,59 CLA 
ARCL 81 

uzi+88 
F5,04,69,6p, 14, CD CLA 
ARCL 82 


uN+Nu0 
MCE TO CE, cLa 
X<>M,x<>C K<>NSTORREL 83 


Huh3Nu 
CESRSCE; DCE, XX CLA 
XSC,X<?M  AREL 84 


BashEa 
c2,03,€8,K,4 
SEEKPT 
GETX 
-6.019500434-42 #44 
CLA 
ARCL * 
-6.815508434E-42 
GETX 
| —2,958169801#8 +4 
| CLA 
AREL X 
-=,950169R01E€8 
GETX 
-1.880000000-88  #4t 
CLA 
ARCL # 
-1.888000000E-8 
GETX 
-1.00000008-24 tx 
CLA 
ARCL # 
-1. 480B0GGGRE-24 
GETX 
-8.220418484-29 #4 
CLA 
ARL X 


-8.228418484E-29 


PATIENCE ET BON COURAGE! 


kon dus DEC du Pas OT Four rue : 
us pot 405 pp 165 432 
vw Lau el 5 uk lé auec G 
PRAMUE LB" d Riouet ANCELET 
pu ouee & BG {à vu teurs) 


EMDIR 
CLAN 1885 
593 #44 
CLXN 
SEEKPTA 
GETR 
.884 
PRREGX 
R8B= “u" 
R&i= “uzi” 
R82= “uN+Nuû” 
RO3= “HyN#u" 
R&4= “Bash£a” 
SEEKPT 
GETX 
-8.180888808 +44 
GETX 
-Z,KB +44 
GETX 
-1.-88 +44 
SEEKPT 
SCI 3 
GETX 
-6.815588434-42  +4x 
GETX 
-2,758169881+€8 464 
GETX 
-1.888899888-88 ++ 
GETX 
-1.888899888-24  4tx 
GETA 
-8.228418484-25 t4$ 
: à DECRYPTER... 


AN3 
ren ennnEnntenrntnnEEnntIttnUITE 
(W) 


dé 


MEN 


£.} 


bp 


LULU LUE UN TEL LIL ETES 


(OÏdE ( <>] 149 


( <>X)39 


ŸD (ym)EE 


pp? 


Er 


#EG “CLEAN” 

CLXM 
SAYEP 
XE8 *P° 


CLAM 


7h 
38 
1? 


vr 
dr 


V 


1 


?b 
bp? 


7} 
LAN 


gb 


MANN 





 … — 
un mu | 
near ss (7 
= a = © 
DE nn — un 
En | nn CRE, 
— Ÿ mu © É] 
mn == |, 

6 == . 
= é EST 
SE 

es SE - 

ESS mx | == 
= © ms | 
Eu > = & —_— 
nn | ms À) um 
—, | = 
ne) nn en 
D — un © mm © 
Se RES SERRES 
ss ses ns 
ms ©? ER 
ER > = mn 
mn a À ass + 
Sr, Se 
SO — (um 
= (© ESS, D 
CN |, 

ce = Î = 
ÉES ae ame] 
==) = mi 
ss) ms DE 
ms ss nn ‘— 
= =-—" 
Eee RSS 
ns == EE 
= = ( SIN |: 
DR © ST I 
DS , SE == < 
Es D | mm 
SES 1 V ——— 

ESS 

HE RS — 
D TT SE ms À 
> um D 
En \ === _ SN 7 
x V SN > = 7 
ns , = 7 SNS 
Es ÉLES EE 
D . Le) 
DR > 
= — 
D 7 
= 
Lumens À 
Se = 
CSS 


PP 


Fe 


24 23 22 21 29 19 18 17 16 15 14 13 12 11 18 9 8 7 6 s LR 3 2 1 


25 


arr ennlenannnnnnntnntnrntttttnttulttEtEEllEnttUUUnl 
a nnnnnnEnnnnnnrennrnnnrnrrnnnrrrtel 
nent nnEnnnnnnlttttttenentrInnnlTtEEEnTEl 
nrnnnnnnnnnnnnnrnnnnntrnnnnrennnlIEnEEllEnnrtnl 
a annnnnenntnEanrtatnnrttnntElEAnEntEUtrEn 
Tr nnnnnnnnannEnnnrntetrnntnrTAtnEnTTIIEEnl 
TE nnEnnnnnnnrnnnnnnntertnttnrrIenl 
nn nnnnnnenEnnnnennnnnntannren 
Tr nrnnnnnnnnnnnnnnnnnnnnnnrnnnrntnntnnnltttttnl 
rrnnnnnnnnrnnrnneneennnnnrannnnnttnqtttnnl 
rt nnnnnnnnnnrnnnnrEnnernntenntEtnnrtrrttttUUel 
nnnnrEnnnnnnnnrnntenelnEnEnnntrennl 
nent qanntetqnrtnnl 
are nnnnnnnnnnnntntnqnlrrrlnrrnnntnttntrntnl 
era aannannnannnnnnnaannnnnnnnrnnnnannrEnlInlltrTanl 
a ntnnnnnEnnnnnnnnnnrnttntennnntttnttrtUUttttnl 
nnnnnntnnnnnrntenTentanatEnttIEttEnl 
Tr nreEnnnnannnnnnnnrtqnstennErqnnl 
Tr nnnnnnnnnnnannnnnrttnNaannntettennnl 
Tr nnnnnnnannnnnnnnenEnlnttItEl 
nn nnnnnnnnnnnnnntarnn 
Tr nnnnannnnnnEnnnnnEnnllltntnE 
Tr nnnnnnnnnnnnnnnnannnnnnennt 
a nnnnnnnnnnnnnnnnnnnnntnnnnnnnnnnnnunl 
nnnnnnnnnnnnrnnnnnnnnnnntnnnnn 


36 35 34 33 32 31 36e 29 28 27 26 


37 





i IMPRIMANTE RRRIDE HP—-JV a22S5 A 




















i L 2 CETTE DEMO EST L'OEUVRE D'UNE HP 41 CV + IMPRIMANTE HP-JV 8228 A + 
I CARACTERES ASCII "FRANCAIS" : I*LSXE" ()#+,-./0123458789: ; (=) 7 
j àABCDEFGHI JHLMNOPGRSTUVWXYZ°SS" _‘abcdefgnik lc rstuvesyzeüées DUR_ET_MOU 
SETS DE CARACT. DISPON. ? UJ.S. - BRITISH - GERMPN - FRENCH 
SANEDISH - DANISH - NORWEGIAN -— OUTCH - ITALIAN - TR5-88 JAN { ez 
CRACTERES GAIQES 1 “AR 01 EE à AR mm LT Te sa 
‘eme du à (HSBUNIBMURRIE DR EU MR NE SE VE FE 
16,5 CHARCTERES PR PACE 18 CARACTERES 8,3 CARACTERES = CARACTERES 2 3 Le s & Ed - 
VITESSE 125 CAS  BI-DIRECTIONMELLE OPTIMISEE 3 18 11 1Æ T7 Er ie 
; 12 & == 
PAPIER x JMS WU! 48 MR PERDRE CAALL OL FEUILLE À FEUILE Re LA 2 26 &7 + es 
ENTRAINEMENT s FRICTION + PERF. CAROLL 22 31 
: L 2 
INTERFACES STANDARD à:  PARAULE CENTRONICS + MAIL » SERIE 1298 35 FEV 1S 32% 
INTERFACES ORTIONNERS x 86 22 C HIGH-GPREED 9608 896 - IEEE 498 DE LU) Me ME ne Ve —_. 
1GPHIEG UANICFI,F 28127 SOMAGNE - TEL. 99/38 83 69 © & 7 + 3 10 11 1=! 
NOTES SUR LA PROGRAMMATION AVEC HP 41 C 13 14 15 16 17 18 12 
20 21 228 235 £4 ES €6 
27 2e | 
MAR 1283 
CRARACTERES : DI LU Ma ME JE ‘/£Æ sa 
1. & 3 = Ed 
| sS 7 8 3 19 11 12: 
- LES FONCTIONS DE BASE : ORA, PRPLOT, ETC. N'ENREBISTRENT PAS LA MODIFICATION DES FLAGS 12 ET 13,- 13 14 15 16 17 18 22: 
UNE FONCTION DE CE MONITEUR, TELLE QE AUTO, TRACE, P$, PLS, DOIT ÊTRE EMPLOYÉE 2% 21 22 23 ir es æe6i 
= 5 ï 
POUR INITIALISER LE SYSTEME APRES UN CHANGEMENT DES FLABS 12 JU 13.— 7 28 23 S2 - : | 
- LES FONCTIONS P$ AVEC X=8, AINSI QUE LA FONCTION PFL, N'ENREBISTRENT PAS NON PLUS LA MODIFICATION DES FLAES. AVR 1983 . f 
/ DI LU MA ME JE *E 2 
s 6 7, 8 ï 
SAUT DE PARAGRAPHE : 12 12 12 135 14:59 te: 
17 18 19 29 €1 . En 
AU DEBUT D'UN TRAVAIL, COMMUNIQUER AU SYSTEME LE NOMBRE DE LIGNES DE CHAQLE PARAGRAPHE, 24 ee 27 #8 : 
DE FACON QUE LES FONCTIONS TAB SOIENT EFFICIENTES. MAI 1983 
- LES LONREURS DES PARAGRAPHES SONT A PRESENTER SOUS FORME D'UN FICHIER ASCII A TRANSFERER DIT U ma Mme JE VE — 
AU SYSTEME PAR UNE INSTRUCTION PRC. Z À JS 11 Le 18 24 
15 16 17 18 1% es er 
CONTENU-TYPE D'UN FICHIER : 22 23 4 2S &6 7 € 
29 39 31 
2 OL 32 49 Z 3% 3% 5 3% Æ EIL ( VALEURS DECIMALES D'OCTET } JUN 1283 ss 
DI LU MA ME JE "E ne 
2 : 
CE 2LIeS 3 LISE us ne Ÿ à © 10 42 
SYSTEÆ€ SI se ‘142 13 14 15 16e 17 18 
19 20 21 22 5 24 &S 
26 27 28 29 2% 
ETATS : 
CHAQUE FONCTION LAISSE LES ETATS SUIVANTS : AOFF + CLA + CLST + CF 14. C7 7 à # FONCTIONS DISPONIBLES + 
FLAG 17 LAISSE IMPRECIS PAR LE SYSTEME. | — 708 CNTRLER PL — 
RACE #0 TC : ONIALOUES, MISE AU POINT DE PRBARGES, 
PMORM RE I : FOCTIDS DIR, ET IPMEXELN DES DITS CUWTEL | 
Le Dome Le avec un calculateur de poche pes 1QRE PERETRN L'UTILISATION DES FIMCTIDS DE DRSE : PAA, PAKEYS, PRALUT, RCA, ETC. 
ea | | lAUTO 4€ PRETTANT L'AISS À TULS LES PÆRIAEQUES LE LA HUILE 
ne er ART pr WIL.- CŒ WE 1 DORIE NI LES INTICE CLAVIER, NI LES PADOT, 
FN ee votre MP.A1 ce nouveau lecteur-enregaireur stocke jusqu'à 50 | M LES IE - LES FOCTIDS IE CE SYSTEE OCCASIONENT SALES L' MER - 
Nate me On» tom ce voume | = LE IQ AUTO CONENCE PAR CONTRILER LE BON ACCES BOUCLE/DORDNNTE, 
HS er ne ep i BAISE LE FLAG 25 POUR ACDMLEER LA VITESSE DE THAITEMENT, ÊT AE 
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PHILIPPE GUEZ 
LIONEL ANCELET 
LAURENT ISTRIA 
OLIVIER DANCER 
PATRICK ZAGURY 
PILOU SANABRIA 
ISTRIA 
JEAN DANIEL DODIN 
PATRICE DROIN 
ERIC DELAGNES 
JACOB DANIEL 
MICHEL MARTINET 
CHARLES-HENRY 
MEGNIN 
PASCAL MELLI 
YVES ALAJOUANINE 
PIERRE BENNING 
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